From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 21 Jun 2004 03:16:28 +0000 (+0000)
Subject: (mouse-set-region-1): Set transient-mark-mode to `only'.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~21905
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=db0a3350c556d93f4f4f232c12edee9c3ae64915;p=emacs.git

(mouse-set-region-1): Set transient-mark-mode to `only'.
---

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 621b517e2fe..7f9d080478a 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -625,7 +625,7 @@ This should be bound to a mouse drag event."
 
 (defun mouse-set-region-1 ()
   ;; Set transient-mark-mode for a little while.
-  (setq transient-mark-mode (or transient-mark-mode 'lambda))
+  (setq transient-mark-mode (or transient-mark-mode 'only))
   (setq mouse-last-region-beg (region-beginning))
   (setq mouse-last-region-end (region-end))
   (setq mouse-last-region-tick (buffer-modified-tick)))